home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Tele / Pete Johnson / TImport 2.0.3<source>.cpt / TImportGlobals.p < prev   
Text File  |  1991-06-25  |  700b  |  39 lines
  1. unit Globals;
  2.  
  3. {    Created June 29, 1989, to organize global variables            }
  4.  
  5. interface
  6.  
  7.     const
  8.         NULL = chr(0);
  9.         CTLA = chr(1);
  10.         TAB = chr(9);
  11.         ENDLINE = chr(13);
  12.         SPACE = chr(32);
  13.  
  14.     type
  15.         MyByte = byte;
  16.         OneString = STR255;
  17.         OneStringPtr = ^OneString;
  18.         OneStringHdl = ^OneStringPtr;
  19.  
  20.         Section = record
  21.                 Name: string;
  22.                 Limit: longint;
  23.                 Age: longint;
  24.                 Number: integer;
  25.                 Backup: boolean
  26.             end;
  27.         SectionPtr = ^Section;
  28.         SectionHandle = ^SectionPtr;
  29.  
  30.     var
  31.         doneFlag, MsgBody, SectCount: boolean;
  32.         HiStringNo, CurrentResFile: integer;
  33.         MyWindow: WindowPtr;
  34.         DateString, TimeString, TabbyStamp, CreatorType: str255;
  35.         MaxMsgLine: longint;
  36.  
  37. implementation
  38.  
  39. end.        {    Globals unit    }